﻿Public Class SachDTO
    Private _maSach As Integer
    Private _tenSach As String
    Private _maTheLoai As Integer
    Private _tacGia As String
    Private _nhaXuatBan As String
    Private _namXuatBan As Date
    Private _ngayNhap As Date
    Private _triGia As Double
    Private _maNhanVien As Integer
    Private _khoangCachXuatBan As Double
    Private _maTinhTrang As Integer
    Public Sub New()
        _maSach = 0
        _tenSach = ""
        _maTheLoai = 0
        _tacGia = ""
        _nhaXuatBan = ""
        _namXuatBan = Date.Now
        _ngayNhap = Date.Now
        _triGia = 0
        _maNhanVien = 0
        _khoangCachXuatBan = 0
        _maTinhTrang = 0
    End Sub
    Public Sub New(ByVal sach As SachDTO)
        _maSach = sach._maSach
        _tenSach = sach._tenSach
        _maTheLoai = sach._maTheLoai
        _tacGia = sach._tacGia
        _nhaXuatBan = sach._nhaXuatBan
        _namXuatBan = sach._namXuatBan
        _ngayNhap = sach._ngayNhap
        _triGia = sach._triGia
        _maNhanVien = sach._maNhanVien
        _khoangCachXuatBan = sach._khoangCachXuatBan
        _maTinhTrang = sach._maTinhTrang

    End Sub


    Public Property MaSach() As Integer
        Get
            Return _maSach
        End Get
        Set(ByVal value As Integer)
            _maSach = value
        End Set
    End Property
    Public Property TenSach() As String
        Get
            Return _tenSach
        End Get
        Set(ByVal value As String)
            _tenSach = value
        End Set
    End Property
    Public Property MaTheLoai() As Integer
        Get
            Return _maTheLoai
        End Get
        Set(ByVal value As Integer)
            _maTheLoai = value
        End Set
    End Property
    Public Property TacGia() As String
        Get
            Return _tacGia
        End Get
        Set(ByVal value As String)
            _tacGia = value
        End Set
    End Property
    Public Property NhaXuatBan() As String
        Get
            Return _nhaXuatBan
        End Get
        Set(ByVal value As String)
            _nhaXuatBan = value
        End Set
    End Property
    Public Property NamXuatBan() As Date
        Get
            Return _namXuatBan
        End Get
        Set(ByVal value As Date)
            _namXuatBan = value
        End Set
    End Property
    Public Property NgayNhap() As Date
        Get
            Return _ngayNhap
        End Get
        Set(ByVal value As Date)
            _ngayNhap = value
        End Set
    End Property
    Public Property TriGia() As Double
        Get
            Return _triGia
        End Get
        Set(ByVal value As Double)
            _triGia = value
        End Set
    End Property
    Public Property MaNhanVien() As Integer
        Get
            Return _maNhanVien
        End Get
        Set(ByVal value As Integer)
            _maNhanVien = value
        End Set
    End Property
    Public Property KhoangCachXuatBan() As Double
        Get
            Return _khoangCachXuatBan
        End Get
        Set(ByVal value As Double)
            _khoangCachXuatBan = value
        End Set
    End Property
    Public Property MaTinhTrang() As Integer
        Get
            Return _maTinhTrang
        End Get
        Set(ByVal value As Integer)
            _maTinhTrang = value
        End Set
    End Property


End Class
